home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / versa11.arc / VERSA4.MNU < prev   
Text File  |  1987-05-23  |  16KB  |  589 lines
  1. SELECT:
  2. SWIT S1
  3. CASE"801"
  4. GOTO SALT_LAK
  5. ENDC
  6. CASE"818"
  7. GOTO GLENDALE
  8. ENDC
  9. CASE"213"
  10. GOTO LA
  11. ENDC
  12. CASE"503"
  13. GOTO PORTLAND
  14. ENDC
  15. CASE"415"
  16. GOTO FRISCO
  17. ENDC
  18. CASE"408"
  19. GOTO SAN_JOSE
  20. ENDC
  21. CASE"206"
  22. GOTO SEATTLE
  23. ENDC
  24. DEFA
  25. ASSI S9"ERROR"
  26. EXEC"VERSA.CMD"
  27. ENDC
  28. ENDS
  29. SALT_LAK:
  30. CLEA
  31. LOCA 2,0
  32. MESS"               ╒═══════╡ Salt Lake BBS Directory  (801) ╞═══════╕"
  33. MESS"               │                                                │"
  34. MESS"               │       -Board-                      -SIG-       │"
  35. MESS"               │                                                │"
  36. MESS"               │  < 1> Salt Air BBS           Home of PC Board  │"
  37. MESS"               │  < 2> InfoQuest Advantage                      │"
  38. MESS"               │  < 3> Techni-Soft                              │"
  39. MESS"               │  < 4> Compushop BBS                            │"
  40. MESS"               │  < 5> Adventurer's Keep                        │"
  41. MESS"               │  < 6> Burgoyne Line 2                          │"
  42. MESS"               │  < 7> Salt Lake Smorgasboard                   │"
  43. MESS"               │  < 8> Redundant Dept. etc                      │"
  44. MESS"               │  < 9> InfoQuest Advantage         David Terry  │"
  45. MESS"               │  <10>                                          │"
  46. MESS"               │                                                │"
  47. MESS"               │          <G>o back to city selection           │"
  48. MESS"               │                                                │"
  49. MESS"               ├────────────────────────────────────────────────┤"
  50. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  51. MESS"               ╘════════════════════════════════════════════════╛"
  52. LOCA 20,56
  53. GET S9 7
  54. SWIT S9
  55. CASE"1"
  56. ASSI S2"2660328"
  57. ;ASSI S7"COMMAND.VER"
  58. ENDC
  59. CASE"2"
  60. ASSI S2"2540344"
  61. ;ASSI S7"COMMAND.VER"
  62. ENDC
  63. CASE"3"
  64. ASSI S2"2648290"
  65. ;ASSI S7"COMMAND.VER"
  66. ENDC
  67. CASE"4"
  68. ASSI S2"5836119"
  69. ;ASSI S7"COMMAND.VER"
  70. ENDC
  71. CASE"5"
  72. ASSI S2"2680069"
  73. ;ASSI S7"COMMAND.VER"
  74. ENDC
  75. CASE"6"
  76. ASSI S2"5317149"
  77. ;ASSI S7"COMMAND.VER"
  78. ENDC
  79. CASE"7"
  80. ASSI S2"5348099"
  81. ;ASSI S7"COMMAND.VER"
  82. ENDC
  83. CASE"8"
  84. ASSI S2"4875339"
  85. ;ASSI S7"COMMAND.VER"
  86. ENDC
  87. CASE"9"
  88. ASSI S2"2540344"
  89. ;ASSI S7"COMMAND.VER"
  90. ENDC
  91. CASE"10"
  92. ASSI S2"XXXXXXX"
  93. ;ASSI S7"COMMAND.VER"
  94. ENDC
  95. CASE"D"
  96. EXEC"VERSA.CMD"
  97. ENDC
  98. CASE"E"
  99. EXEC"VERSA.CMD"
  100. ENDC
  101. CASE"G"
  102. EXEC"VERSA.CMD"
  103. ENDC
  104. DEFA
  105. ASSI S2 S9ENDC
  106. ENDS
  107. ASSI S9"ACTIVE"
  108. EXEC"VERSA.CMD"
  109. GLENDALE:
  110. CLEA
  111. LOCA 2,0
  112. MESS"               ╒════════╡ Glendale BBS Directory (818) ╞════════╕"
  113. MESS"               │                                                │"
  114. MESS"               │       -Board-                      -SIG-       │"
  115. MESS"               │                                                │"
  116. MESS"               │  < 1> The Lunacy BBS              2000+ files  │"
  117. MESS"               │  < 2> BAMM!!                                    │"
  118. MESS"               │  < 3> Underground RBBS                         │"
  119. MESS"               │  < 4> Light Artists                            │"
  120. MESS"               │  < 5> Sysops Only                              │"
  121. MESS"               │  < 6> Programmer Xchange                       │"
  122. MESS"               │  < 7> Vangaurd                                 │"
  123. MESS"               │  < 8> B.J.'s                                   │"
  124. MESS"               │  < 9> The Ledge PCBoard                        │"
  125. MESS"               │  <10>                                          │"
  126. MESS"               │                                                │"
  127. MESS"               │          <G>o back to city selection           │"
  128. MESS"               │                                                │"
  129. MESS"               ├────────────────────────────────────────────────┤"
  130. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  131. MESS"               ╘════════════════════════════════════════════════╛"
  132. LOCA 20,56
  133. GET S9 7
  134. SWIT S9
  135. CASE"1"
  136. ASSI S2"8941248"
  137. ;ASSI S7"COMMAND.VER"
  138. ENDC
  139. CASE"2"
  140. ASSI S2"3454485"
  141. ;ASSI S7"COMMAND.VER"
  142. ENDC
  143. CASE"3"
  144. ASSI S2"9540800"
  145. ;ASSI S7"COMMAND.VER"
  146. ENDC
  147. CASE"4"
  148. ASSI S2"9850541"
  149. ;ASSI S7"COMMAND.VER"
  150. ENDC
  151. CASE"5"
  152. ASSI S2"9906842"
  153. ;ASSI S7"COMMAND.VER"
  154. ENDC
  155. CASE"6"
  156. ASSI S2"2817586"
  157. ;ASSI S7"COMMAND.VER"
  158. ENDC
  159. CASE"7"
  160. ASSI S2"8968602"
  161. ;ASSI S7"COMMAND.VER"
  162. ENDC
  163. CASE"8"
  164. ASSI S2"2481087"
  165. ;ASSI S7"COMMAND.VER"
  166. ENDC
  167. CASE"9"
  168. ASSI S2"3523620"
  169. ;ASSI S7"COMMAND.VER"
  170. ENDC
  171. CASE"10"
  172. ASSI S2"XXXXXXX"
  173. ;ASSI S7"COMMAND.VER"
  174. ENDC
  175. CASE"D"
  176. EXEC"VERSA.CMD"
  177. ENDC
  178. CASE"E"
  179. EXEC"VERSA.CMD"
  180. ENDC
  181. CASE"G"
  182. EXEC"VERSA.CMD"
  183. ENDC
  184. DEFA
  185. ASSI S2 S9ENDC
  186. ENDS
  187. ASSI S9"ACTIVE"
  188. EXEC"VERSA.CMD"
  189. LA:
  190. CLEA
  191. LOCA 2,0
  192. MESS"               ╒══════╡ Los Angeles BBS Directory  (213) ╞══════╕"
  193. MESS"               │                                                │"
  194. MESS"               │       -Board-                      -SIG-       │"
  195. MESS"               │                                                │"
  196. MESS"               │  < 1> Crest BBS                                │"
  197. MESS"               │  < 2> Point=Stone                              │"
  198. MESS"               │  < 3> Sleepy Hollow                            │"
  199. MESS"               │  < 4> Camelot                                  │"
  200. MESS"               │  < 5> Intl Collectors                          │"
  201. MESS"               │  < 6> Host 102 Socialnet                       │"
  202. MESS"               │  < 7> RWL Downloading                          │"
  203. MESS"               │  < 8> Bytebusters Lair                         │"
  204. MESS"               │  < 9> South Bay PC BBS                         │"
  205. MESS"               │  <10>                                          │"
  206. MESS"               │                                                │"
  207. MESS"               │          <G>o back to city selection           │"
  208. MESS"               │                                                │"
  209. MESS"               ├────────────────────────────────────────────────┤"
  210. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  211. MESS"               ╘════════════════════════════════════════════════╛"
  212. LOCA 20,56
  213. GET S9 7
  214. SWIT S9
  215. CASE"1"
  216. ASSI S2"4712518"
  217. ;ASSI S7"COMMAND.VER"
  218. ENDC
  219. CASE"2"
  220. ASSI S2"8212675"
  221. ;ASSI S7"COMMAND.VER"
  222. ENDC
  223. CASE"3"
  224. ASSI S2"8599334"
  225. ;ASSI S7"COMMAND.VER"
  226. ENDC
  227. CASE"4"
  228. ASSI S2"2046158"
  229. ;ASSI S7"COMMAND.VER"
  230. ENDC
  231. CASE"5"
  232. ASSI S2"2040646"
  233. ;ASSI S7"COMMAND.VER"
  234. ENDC
  235. CASE"6"
  236. ASSI S2"2042996"
  237. ;ASSI S7"COMMAND.VER"
  238. ENDC
  239. CASE"7"
  240. ASSI S2"2577327"
  241. ;ASSI S7"COMMAND.VER"
  242. ENDC
  243. CASE"8"
  244. ASSI S2"3700189"
  245. ;ASSI S7"COMMAND.VER"
  246. ENDC
  247. CASE"9"
  248. ASSI S2"3767089"
  249. ;ASSI S7"COMMAND.VER"
  250. ENDC
  251. CASE"10"
  252. ASSI S2"XXXXXXX"
  253. ;ASSI S7"COMMAND.VER"
  254. ENDC
  255. CASE"D"
  256. EXEC"VERSA.CMD"
  257. ENDC
  258. CASE"E"
  259. EXEC"VERSA.CMD"
  260. ENDC
  261. CASE"G"
  262. EXEC"VERSA.CMD"
  263. ENDC
  264. DEFA
  265. ASSI S2 S9ENDC
  266. ENDS
  267. ASSI S9"ACTIVE"
  268. EXEC"VERSA.CMD"
  269. PORTLAND:
  270. CLEA
  271. LOCA 2,0
  272. MESS"               ╒════════╡ Portland BBS Directory (503) ╞════════╕"
  273. MESS"               │                                                │"
  274. MESS"               │       -Board-                      -SIG-       │"
  275. MESS"               │                                                │"
  276. MESS"               │  < 1> PEGBOARD 2                               │"
  277. MESS"               │  < 2> Experimentor's Connx                     │"
  278. MESS"               │  < 3> Huggy's Den                              │"
  279. MESS"               │  < 4> Pro-YAM System                           │"
  280. MESS"               │  < 5> VanPort Area                             │"
  281. MESS"               │  < 6> Aloha RBBS                               │"
  282. MESS"               │  < 7> CTCSoftware Etc                          │"
  283. MESS"               │  < 8> WSO's Roost                              │"
  284. MESS"               │  < 9> PSG Portland                             │"
  285. MESS"               │  <10>                                          │"
  286. MESS"               │                                                │"
  287. MESS"               │          <G>o back to city selection           │"
  288. MESS"               │                                                │"
  289. MESS"               ├────────────────────────────────────────────────┤"
  290. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  291. MESS"               ╘════════════════════════════════════════════════╛"
  292. LOCA 20,56
  293. GET S9 7
  294. SWIT S9
  295. CASE"1"
  296. ASSI S2"2394032"
  297. ;ASSI S7"COMMAND.VER"
  298. ENDC
  299. CASE"2"
  300. ASSI S2"2533650"
  301. ;ASSI S7"COMMAND.VER"
  302. ENDC
  303. CASE"3"
  304. ASSI S2"6464312"
  305. ;ASSI S7"COMMAND.VER"
  306. ENDC
  307. CASE"4"
  308. ASSI S2"6213746"
  309. ;ASSI S7"COMMAND.VER"
  310. ENDC
  311. CASE"5"
  312. ASSI S2"2818322"
  313. ;ASSI S7"COMMAND.VER"
  314. ENDC
  315. CASE"6"
  316. ASSI S2"6453667"
  317. ;ASSI S7"COMMAND.VER"
  318. ENDC
  319. CASE"7"
  320. ASSI S2"6539576"
  321. ;ASSI S7"COMMAND.VER"
  322. ENDC
  323. CASE"8"
  324. ASSI S2"2810952"
  325. ;ASSI S7"COMMAND.VER"
  326. ENDC
  327. CASE"9"
  328. ASSI S2"2979145"
  329. ;ASSI S7"COMMAND.VER"
  330. ENDC
  331. CASE"10"
  332. ASSI S2"XXXXXXX"
  333. ;ASSI S7"COMMAND.VER"
  334. ENDC
  335. CASE"D"
  336. EXEC"VERSA.CMD"
  337. ENDC
  338. CASE"E"
  339. EXEC"VERSA.CMD"
  340. ENDC
  341. CASE"G"
  342. EXEC"VERSA.CMD"
  343. ENDC
  344. DEFA
  345. ASSI S2 S9ENDC
  346. ENDS
  347. ASSI S9"ACTIVE"
  348. EXEC"VERSA.CMD"
  349. FRISCO:
  350. CLEA
  351. LOCA 2,0
  352. MESS"               ╒═════╡ San Francisco BBS Directory  (415) ╞═════╕"
  353. MESS"               │                                                │"
  354. MESS"               │       -Board-                      -SIG-       │"
  355. MESS"               │                                                │"
  356. MESS"               │  < 1> Charisma                    Multi - SIG  │"
  357. MESS"               │  < 2> Com One                        PC Board  │"
  358. MESS"               │  < 3> VOR RBBS                   Vernon Buerg  │"
  359. MESS"               │  < 4> Pyramid of Power               PC Board  │"
  360. MESS"               │  < 5> Echelon BBS                    PC Board  │"
  361. MESS"               │  < 6> 448 Bernal Bears Board                   │"
  362. MESS"               │  < 7> Midnight Express                         │"
  363. MESS"               │  < 8> 321 Well Tempered BBS                    │"
  364. MESS"               │  < 9> SCI FIDO                                 │"
  365. MESS"               │  <10>                                          │"
  366. MESS"               │                                                │"
  367. MESS"               │          <G>o back to city selection           │"
  368. MESS"               │                                                │"
  369. MESS"               ├────────────────────────────────────────────────┤"
  370. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  371. MESS"               ╘════════════════════════════════════════════════╛"
  372. LOCA 20,56
  373. GET S9 7
  374. SWIT S9
  375. CASE"1"
  376. ASSI S2"3496576"
  377. ;ASSI S7"COMMAND.VER"
  378. ENDC
  379. CASE"2"
  380. ASSI S2"3700411"
  381. ;ASSI S7"COMMAND.VER"
  382. ENDC
  383. CASE"3"
  384. ASSI S2"9942944"
  385. ;ASSI S7"COMMAND.VER"
  386. ENDC
  387. CASE"4"
  388. ASSI S2"4820532"
  389. ;ASSI S7"COMMAND.VER"
  390. ENDC
  391. CASE"5"
  392. ASSI S2"4831768"
  393. ;ASSI S7"COMMAND.VER"
  394. ENDC
  395. CASE"6"
  396. ASSI S2"6483014"
  397. ;ASSI S7"COMMAND.VER"
  398. ENDC
  399. CASE"7"
  400. ASSI S2"7923210"
  401. ;ASSI S7"COMMAND.VER"
  402. ENDC
  403. CASE"8"
  404. ASSI S2"5893273"
  405. ;ASSI S7"COMMAND.VER"
  406. ENDC
  407. CASE"9"
  408. ASSI S2"6550677"
  409. ;ASSI S7"COMMAND.VER"
  410. ENDC
  411. CASE"10"
  412. ASSI S2"XXXXXXX"
  413. ;ASSI S7"COMMAND.VER"
  414. ENDC
  415. CASE"D"
  416. EXEC"VERSA.CMD"
  417. ENDC
  418. CASE"E"
  419. EXEC"VERSA.CMD"
  420. ENDC
  421. CASE"G"
  422. EXEC"VERSA.CMD"
  423. ENDC
  424. DEFA
  425. ASSI S2 S9ENDC
  426. ENDS
  427. ASSI S9"ACTIVE"
  428. EXEC"VERSA.CMD"
  429. SAN_JOSE:
  430. CLEA
  431. LOCA 2,0
  432. MESS"               ╒════════╡ San Jose BBS Directory (408) ╞════════╕"
  433. MESS"               │                                                │"
  434. MESS"               │       -Board-                      -SIG-       │"
  435. MESS"               │                                                │"
  436. MESS"               │  < 1> Bizcomp BBS                              │"
  437. MESS"               │  < 2> Computer Tyme                            │"
  438. MESS"               │  < 3> Capitol City RBBS                        │"
  439. MESS"               │  < 4> NORAD / Science                          │"
  440. MESS"               │  < 5> Publ Dom Softw Sp                        │"
  441. MESS"               │  < 6> Seacon                                   │"
  442. MESS"               │  < 7> Bay Area BBS                             │"
  443. MESS"               │  < 8> PD Software Xchd                         │"
  444. MESS"               │  < 9> Paco's BBS                               │"
  445. MESS"               │  <10>                                          │"
  446. MESS"               │                                                │"
  447. MESS"               │          <G>o back to city selection           │"
  448. MESS"               │                                                │"
  449. MESS"               ├────────────────────────────────────────────────┤"
  450. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  451. MESS"               ╘════════════════════════════════════════════════╛"
  452. LOCA 20,56
  453. GET S9 7
  454. SWIT S9
  455. CASE"1"
  456. ASSI S2"7209212"
  457. ;ASSI S7"COMMAND.VER"
  458. ENDC
  459. CASE"2"
  460. ASSI S2"7322187"
  461. ;ASSI S7"COMMAND.VER"
  462. ENDC
  463. CASE"3"
  464. ASSI S2"2274865"
  465. ;ASSI S7"COMMAND.VER"
  466. ENDC
  467. CASE"4"
  468. ASSI S2"2685157"
  469. ;ASSI S7"COMMAND.VER"
  470. ENDC
  471. CASE"5"
  472. ASSI S2"2704085"
  473. ;ASSI S7"COMMAND.VER"
  474. ENDC
  475. CASE"6"
  476. ASSI S2"3568235"
  477. ;ASSI S7"COMMAND.VER"
  478. ENDC
  479. CASE"7"
  480. ASSI S2"7237238"
  481. ;ASSI S7"COMMAND.VER"
  482. ENDC
  483. CASE"8"
  484. ASSI S2"7357190"
  485. ;ASSI S7"COMMAND.VER"
  486. ENDC
  487. CASE"9"
  488. ASSI S2"6299393"
  489. ;ASSI S7"COMMAND.VER"
  490. ENDC
  491. CASE"10"
  492. ASSI S2"XXXXXXX"
  493. ;ASSI S7"COMMAND.VER"
  494. ENDC
  495. CASE"D"
  496. EXEC"VERSA.CMD"
  497. ENDC
  498. CASE"E"
  499. EXEC"VERSA.CMD"
  500. ENDC
  501. CASE"G"
  502. EXEC"VERSA.CMD"
  503. ENDC
  504. DEFA
  505. ASSI S2 S9ENDC
  506. ENDS
  507. ASSI S9"ACTIVE"
  508. EXEC"VERSA.CMD"
  509. SEATTLE:
  510. CLEA
  511. LOCA 2,0
  512. MESS"               ╒════════╡ Seattle BBS Directory  (206) ╞════════╕"
  513. MESS"               │                                                │"
  514. MESS"               │       -Board-                      -SIG-       │"
  515. MESS"               │                                                │"
  516. MESS"               │  < 1> Galaxy                Home of Galaxy WP  │"
  517. MESS"               │  < 2> Infinity BASE                  PC Board  │"
  518. MESS"               │  < 3> Cboard                      C Languages  │"
  519. MESS"               │  < 4> Puget Sound RBBS      ($)Communications  │"
  520. MESS"               │  < 5> Underdog's Mininet                       │"
  521. MESS"               │  < 6> Eskimo North                             │"
  522. MESS"               │  < 7> 20M Pugent Sound                         │"
  523. MESS"               │  < 8> Sanctuary                                │"
  524. MESS"               │  < 9> Cheryl's Velvet Touch                    │"
  525. MESS"               │  <10>                                          │"
  526. MESS"               │                                                │"
  527. MESS"               │          <G>o back to city selection           │"
  528. MESS"               │                                                │"
  529. MESS"               ├────────────────────────────────────────────────┤"
  530. MESS"               │  Enter 1-10 or other BBS phone number:         │"
  531. MESS"               ╘════════════════════════════════════════════════╛"
  532. LOCA 20,56
  533. GET S9 7
  534. SWIT S9
  535. CASE"1"
  536. ASSI S2"2358760"
  537. ;ASSI S7"COMMAND.VER"
  538. ENDC
  539. CASE"2"
  540. ASSI S2"3299026"
  541. ;ASSI S7"COMMAND.VER"
  542. ENDC
  543. CASE"3"
  544. ASSI S2"4880924"
  545. ;ASSI S7"COMMAND.VER"
  546. ENDC
  547. CASE"4"
  548. ASSI S2"2817661"
  549. ;ASSI S7"COMMAND.VER"
  550. ENDC
  551. CASE"5"
  552. ASSI S2"7259233"
  553. ;ASSI S7"COMMAND.VER"
  554. ENDC
  555. CASE"6"
  556. ASSI S2"3673837"
  557. ;ASSI S7"COMMAND.VER"
  558. ENDC
  559. CASE"7"
  560. ASSI S2"7430162"
  561. ;ASSI S7"COMMAND.VER"
  562. ENDC
  563. CASE"8"
  564. ASSI S2"7476839"
  565. ;ASSI S7"COMMAND.VER"
  566. ENDC
  567. CASE"9"
  568. ASSI S2"9372957"
  569. ;ASSI S7"COMMAND.VER"
  570. ENDC
  571. CASE"10"
  572. ASSI S2"XXXXXXX"
  573. ;ASSI S7"COMMAND.VER"
  574. ENDC
  575. CASE"D"
  576. EXEC"VERSA.CMD"
  577. ENDC
  578. CASE"E"
  579. EXEC"VERSA.CMD"
  580. ENDC
  581. CASE"G"
  582. EXEC"VERSA.CMD"
  583. ENDC
  584. DEFA
  585. ASSI S2 S9ENDC
  586. ENDS
  587. ASSI S9"ACTIVE"
  588. EXEC"VERSA.CMD"
  589.